#include "ccw_i2c.h"
#include "delay.h"

#define SOFT_IIC_TIME 6

//初始化IIC
void ccw_i2c_init(void)
{		     
	IIC_SCL=1;
	IIC_SDA=1;
    STOP_IIC();	
}
void ccw_i2c_deinit(void)
{
    STOP_IIC();	
}
//产生IIC起始信号
static void IIC_Start(void)
{
	SDA_OUT();     //sda线输出
	IIC_SDA=1;	  	  
	IIC_SCL=1;
	delay_us(SOFT_IIC_TIME);
 	IIC_SDA=0;//START:when CLK is high,DATA change form high to low 
	delay_us(SOFT_IIC_TIME);
	IIC_SCL=0;//钳住I2C总线，准备发送或接收数据 
}
//产生IIC起始信号
static void IIC_ReStart(void)
{
	SDA_OUT();     //sda线输出
	IIC_SDA=1;	  	  
	IIC_SCL=1;
	delay_us(10 + SOFT_IIC_TIME);
 	IIC_SDA=0;//START:when CLK is high,DATA change form high to low 
	delay_us(SOFT_IIC_TIME);
	IIC_SCL=0;//钳住I2C总线，准备发送或接收数据 
}	  

//产生IIC停止信号
static void IIC_Stop(void)
{
	SDA_OUT();//sda线输出
	IIC_SDA=0; 
	IIC_SDA=0;
 	delay_us(SOFT_IIC_TIME);
	// IIC_SDA=0;//STOP:when CLK is high DATA change form low to high
	IIC_SCL=1;//发送I2C总线结束信号
 	delay_us(SOFT_IIC_TIME);
	IIC_SDA=1; 
	delay_us(SOFT_IIC_TIME);
    STOP_IIC();						   	
}
//等待应答信号到来
//返回值：1，接收应答失败
//        0，接收应答成功
static u8 IIC_Wait_Ack(void)
{
	u8 ucErrTime=0;
	SDA_IN();      //SDA设置为输入  
	IIC_SDA=1;//delay_us(1);
	IIC_SCL=1;
	while(READ_SDA)
	{
		ucErrTime++;
		if(ucErrTime>50)
		{
			IIC_Stop();
			return 1;
		}
	}
	delay_us(SOFT_IIC_TIME);
	IIC_SCL=0;//时钟输出0  
	return 0;  
} 
//产生ACK应答
static void IIC_Ack(u8 ack)
{
	IIC_SCL=0;
	SDA_OUT();
	IIC_SDA= !ack;
	delay_us(2);
	IIC_SCL=1;
	delay_us(2);
	IIC_SCL=0;
}
// //不产生ACK应答		    
// static void IIC_NAck(void)
// {
// 	IIC_SCL=0;
// 	SDA_OUT();
// 	IIC_SDA=1;
// 	delay_us(2);
// 	IIC_SCL=1;
// 	delay_us(2);
// 	IIC_SCL=0;
// }					 				     
//IIC发送一个字节
//返回从机有无应答
//1，有应答
//0，无应答			  
static u8 IIC_Send_Byte(u8 txd)
{
	SDA_OUT(); 	    
    IIC_SCL=0;//拉低时钟开始数据传输
    for(u8 t=0;t<8;t++)
    {              
        IIC_SDA=(txd&0x80)>>7;
        txd<<=1; 	  
		delay_us(SOFT_IIC_TIME);   //对TEA5767这三个延时都是必须的
		IIC_SCL=1;
		delay_us(SOFT_IIC_TIME); 
		IIC_SCL=0;	
		delay_us(SOFT_IIC_TIME);
	}
	return !IIC_Wait_Ack();
} 	    
//读1个字节，ack=1时，发送ACK，ack=0，发送nACK   
static u8 IIC_Read_Byte(unsigned char ack)
{
	unsigned char i,receive=0;
	SDA_IN();//SDA设置为输入
	IIC_SDA=1;
    for(i=0;i<8;i++ )
	{
        IIC_SCL=0; 
        delay_us(2);
		IIC_SCL=1;
        receive<<=1;
        if(READ_SDA)receive++;   
		delay_us(1); 
    }		
	IIC_Ack(ack);			 
    // if (!ack)
    //     IIC_NAck();//发送nACK
    // else
    //     IIC_Ack(); //发送ACK   
    return receive;
}
//-------------------------------------------------
u8 IIC_Write_One_Byte(u8 daddr,u8 addr,u8 data)
{
    IIC_Start();
    if (IIC_Send_Byte(daddr) == 0) {
		return 0;
	}
    if (IIC_Send_Byte(addr) == 0) {
		return 0;
	}
    if (IIC_Send_Byte(data) == 0) {
		return 0;
	}
    IIC_Stop();
    return 0;
}

u8 IIC_Write_Bytes(u8 daddr,u8 addr, u8 num, u8 *data_buff)
{
	u8 i = 0;
    IIC_Start();
    if (IIC_Send_Byte(daddr) == 0) {
		return 0;
	}
    if (IIC_Send_Byte(addr) == 0) {
		return 0;
	}
	for (i = 0; i < num; i++){
		if (IIC_Send_Byte(data_buff[i]) == 0) {
			return i;
		}
	}
    IIC_Stop();
	return i;
}

u8 IIC_Read_One_Byte(u8 daddr,u8 addr)
{
    u8 data = 0xff;
    IIC_Start();
    if (IIC_Send_Byte(daddr) == 0) {
		return 0;
	}
    if (IIC_Send_Byte(addr) == 0) {
		return 0;
	}

	IIC_ReStart(); // re start // re start

    if (IIC_Send_Byte(daddr | 0x01) == 0) {
		return 0;
	}

    data=IIC_Read_Byte(0);

    IIC_Stop();
    return data;
}

u8 IIC_Read_Bytes(u8 daddr,u8 addr, u8 num, u8 *data_buff)
{
    u8 i = 0, index = 0;
    IIC_Start();
    if (IIC_Send_Byte(daddr) == 0) {
		return 0;
	}
    if (IIC_Send_Byte(addr) == 0) {
		return 0;
	}

	IIC_ReStart(); // re start
    if (IIC_Send_Byte(daddr | 0x01) == 0) {
		return 0;
	}

	for (index = 0; index < num; index++, IIC_Ack(index != num)){
		data_buff[index]=0;
		SDA_IN();//SDA设置为输入
		IIC_SDA = 1;
		for(i=0;i<8;i++ )
		{
			IIC_SCL=0; 
			delay_us(SOFT_IIC_TIME);
			IIC_SCL=1;
			data_buff[index]<<=1;
			if(READ_SDA) data_buff[index]++;   
			delay_us(SOFT_IIC_TIME - 1); 
		}
	}
    IIC_Stop();
    return num;
}


















